home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 December / MACPOWER-1997-12.ISO.7z / MACPOWER-1997-12.ISO / AMUG / ART / ScanKeeper 1.2 ppc.sit / ScanKeeper 1.2 ppc / ScanKeeper AppleScript R馭s next >
Text File  |  1997-07-16  |  2KB  |  65 lines
  1. (*-------------------------------------------
  2. File: ScanKeeper Script Ref
  3. Author: Jean Penicaud
  4. E-mail: jeanpe@club-internet.fr
  5. Origin: This file is a component of ScanKeeper application, and must
  6. be delivered with the application.
  7. Purpose: This file gives you samples way to drive the application
  8. with AppleScript. This list isn't complete but give you an overview
  9. of all capabilities of the sofware.
  10. Revision: July 1997
  11.           Added rotation to dictionary
  12. ---------------------------------------------
  13. *)
  14.  
  15. tell application "ScanKeeper"
  16.     
  17.     (* ------- Rotations samples -------
  18.         -- Rotate document left
  19.     rotateleft document 1
  20.         -- Rotate document right
  21.     rotateright document 1
  22.         -- Rotate 180 ｡ image document
  23.     flipimage document 1
  24.     *)
  25.  
  26.     (* ------- Open / Save samples -------
  27.     set fichier to "Macintosh HD:Images:article Next SVM.TIFF"
  28.     open fichier
  29.     open file "External HD:Book:Images:Wargame.PICT"
  30.     save document "Wargame.PICT" in "Macintosh HD:Desktop folder:Test.tiff" as TIFF4
  31.     *)
  32.     
  33.     (* ------- Deal with window -------
  34.     close window 1
  35.     get name of window 1
  36.     get selection of window 2
  37.     set selection of window 2 to {0, 0, 0, 0}
  38.     set zoomed of window 2 to true
  39.     set zoomed of window 1 to false
  40.     *)
  41.     
  42.     (* ------- Deal with document -------
  43.     open document "CD-ROM Archive95:Images:JO du 23/10/95.TIFF"
  44.     get name of document 1
  45.     get selection of document 1
  46.     set selection of document "JO du 23/10/95.TIFF" to {416, 696, 920, 1144}
  47.     set selection of document 1 to {0, 0, 600, 600}
  48.     print document "JO du 23/10/95.TIFF"
  49.     print document 2
  50.     save document 1 in "Internal HD:Desktop folder:My Image TIFF" as TIFF3
  51.     save document 1 in file "Internal HD:Desktop Folder:Image PICT" as PICT
  52.     save document 1 in "Internal HD:Desktop folder:Image G4" as TIFF4
  53.     close document 1
  54.     *)
  55.     
  56.     (* ------- Deal with scanner -------
  57.         -- Scan a new document
  58.     scan
  59.         -- Scan and save in file as specified format
  60.     scanandsave in file "Internal HD:Desktop Folder:Today Scan " as TIFF4
  61.     *)
  62.     
  63. end tell
  64.  
  65.